home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PD Collection CD 1
/
PD Collection CD 1.iso
/
programer2
/
gnust
/
test
/
strings
< prev
next >
Wrap
Text File
|
1991-09-13
|
518b
|
35 lines
"Test string operations"
"======================================================================
|
| Copyright (C) 1988, 1989 Steven B. Byrne.
| All rights reserved.
|
======================================================================"
!Object methodsFor: 'testing'!
strTest
| str |
str _ 'quem'.
str at: 1 put: $Q.
^str
!!
^'foo'!
^'foo on you'!
^'foo on
multiple line string
you'!
^'test embedded quote marks, can''t I do this?'!
^'FUBAR' at: 3!
^'quem' at: 1 put: $Q!
^nil strTest!